object fTable: TfTable Left = 211 Top = 157 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'Table Creator' ClientHeight = 353 ClientWidth = 317 Color = clBtnFace Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [] OldCreateOrder = False Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object GroupBox1: TGroupBox Left = 2 Top = 208 Width = 311 Height = 113 Caption = 'Table Properties' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [fsBold] ParentFont = False TabOrder = 0 object Label4: TLabel Left = 9 Top = 59 Width = 21 Height = 12 Caption = 'Size' Enabled = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] ParentFont = False end object Label7: TLabel Left = 94 Top = 59 Width = 63 Height = 12 Caption = 'Border Color' Enabled = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] ParentFont = False end object Label8: TLabel Left = 197 Top = 59 Width = 87 Height = 12 Caption = 'Background color' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 195 Top = 12 Width = 59 Height = 12 Caption = 'Table Width' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] ParentFont = False end object Border: TCheckBox Left = 9 Top = 37 Width = 75 Height = 17 Caption = 'Use Border' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = BorderClick end object Panel1: TPanel Left = 93 Top = 75 Width = 72 Height = 21 Hint = 'Click to change border color' BevelOuter = bvLowered Color = clBlack ParentShowHint = False ShowHint = True TabOrder = 1 Visible = False OnClick = Panel1Click end object Panel2: TPanel Left = 197 Top = 75 Width = 72 Height = 21 Hint = 'Click to change background color' BevelOuter = bvLowered Color = clWhite ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = Panel2Click end object Panel3: TPanel Left = 183 Top = 10 Width = 2 Height = 86 BevelOuter = bvLowered Caption = 'Panel3' TabOrder = 3 end object Edit3: TEdit Left = 196 Top = 29 Width = 72 Height = 20 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] ParentFont = False TabOrder = 4 Text = '100%' end object edit4: TSpinEdit Left = 8 Top = 75 Width = 77 Height = 21 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] MaxValue = 0 MinValue = 0 ParentFont = False TabOrder = 5 Value = 1 Visible = False end end object GroupBox2: TGroupBox Left = 2 Top = 1 Width = 311 Height = 204 Caption = 'Table Size' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [fsBold] ParentFont = False TabOrder = 1 object Label1: TLabel Left = 8 Top = 22 Width = 26 Height = 12 Caption = 'Rows' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 8 Top = 70 Width = 44 Height = 12 Caption = 'Columns' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] ParentFont = False end object Shape1: TShape Left = 100 Top = 38 Width = 68 Height = 69 Brush.Color = 13554646 end object Image1: TImage Left = 103 Top = 42 Width = 65 Height = 65 Picture.Data = {} end object Edit1: TEdit Left = 8 Top = 38 Width = 73 Height = 20 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] ParentFont = False TabOrder = 0 end object Edit2: TEdit Left = 8 Top = 86 Width = 73 Height = 20 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] ParentFont = False TabOrder = 1 end object RadioGroup1: TRadioGroup Left = 192 Top = 117 Width = 105 Height = 81 Caption = 'Alignment' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [fsBold] ItemIndex = 0 Items.Strings = ( 'Right' 'Center' 'Left') ParentFont = False TabOrder = 2 end object GroupBox3: TGroupBox Left = 8 Top = 117 Width = 161 Height = 81 Caption = 'Cell properties' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [fsBold] ParentFont = False TabOrder = 3 object Label5: TLabel Left = 88 Top = 28 Width = 59 Height = 12 Caption = 'Cellspacing' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] ParentFont = False end object Label6: TLabel Left = 8 Top = 28 Width = 59 Height = 12 Caption = 'Cellpadding' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] ParentFont = False end object SpinEdit1: TSpinEdit Left = 8 Top = 44 Width = 57 Height = 21 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] MaxValue = 0 MinValue = 0 ParentFont = False TabOrder = 0 Value = 5 end object SpinEdit2: TSpinEdit Left = 88 Top = 44 Width = 57 Height = 21 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] MaxValue = 0 MinValue = 0 ParentFont = False TabOrder = 1 Value = 0 end end end object Button1: TButton Left = 100 Top = 327 Width = 115 Height = 21 Caption = 'Create Table' Default = True Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnClick = Button1Click end object ColorDialog1: TColorDialog Ctl3D = True Left = 226 Top = 40 end end